Drivin' Route 66/Drivin' Route 66 (1995)(Creative Multimedia)[Mac-PC].iso/pc/rtcc.dir/00340_Script_main

Text File | 1995-10-02 | 3KB | 194 lines

--Lisa Sirois

on startMovie
  set the centerstage to true
  menuOff
  puppettransition 23
  updatestage
  global choseOption
  set choseOption to 0
  set the colorDepth to 8
  set the centerStage to true
  set the volume of sound 1 to 256
  set the volume of sound 2 to 140
  --set the keyDownScript to "keything"
end

on keything
  global evil
  if the key = "6" then
    put 600 into evil
  end if
  set the keydownscript to "key2"
end

on key2
  global evil
  if the key = "6" then
    put 60+evil into evil
  end if
  set the keydownscript to "key3"
end

on key3
  global evil
  if the key= "6" then
    put 6+ evil into evil
  end if
  if evil=666 then
    go FRAME 1709
  end if
  set the keydownscript to "keything"
end







--a temporary fix for a leftover script call
on dopicon
  nothing
end


on stopMovie
  when timeOut then nothing
  sound stop 1
  sound stop 2
  menuOff
  unloadcast
end


on menuScripts
  global choseOption
  if integer(choseOption) = 1 then
    go the frame
  end if
end

on puppetExternalSound soundname
  global where
  sound playfile 1, where & soundname
  --checkoption
end



on checkoption
  global choseoption
  if choseoption=1 then
    menuscripts
  end if
end



on mousedown
  global choseoption
  set choseoption to 1
end



on main
  global choseOption
  set choseOption to 0
  repeat while the mouseDown AND the clickon=41
    set the castNum of sprite 42 to the number of cast "menu.active"
    updateStage
  end repeat
  set the castNum of sprite 42 to the number of cast "menu.plain"
  gomain
  updateStage
end

on blacontinue
  repeat while the mouseDown AND the clickon=41
    set the castNum of sprite 41 to the number of cast "continue.active"
    updatestage
  end repeat
  set the castNum of sprite 41 to the number of cast "continue.plain"
  gocontinue
  updateStage
end


on rewind
  cursor 4
  set the castnum of sprite 43 to the number of cast "rewind off"
  updatestage
  puppetTransition 23
  go marker (-10)
  set the castnum of sprite 43 to the number of cast "rewind on"
  updatestage
  cursor -1
end



on fastforward
  cursor 4
  set the castnum of sprite 44 to the number of cast "fastforward off"
  updatestage
  puppetTransition 23
    go marker (10)
  set the castnum of sprite 44 to the number of cast "fastforward on"
  updatestage
  cursor -1
end




on goMain
  global choseOption
  put 0 into choseOption
  menuOff
  updateStage
  sound stop 1
  sound stop 2
  dodelay
  go "fader2"
end

on goContinue
  global choseOption
  put 0 into choseOption
  menuoff
  --updatestage
end


on gotClick
  global choseOption
  put 1 into choseOption
  menuOn
  updateStage
end



on menuOn
  set the volume of sound 1 to 0
  set the volume of sound 2 to 0
  repeat with cnt = 40 to 46
    puppetSprite cnt, true
    set the visibility of sprite cnt to true
  end repeat
end


on menuOff
  set the volume of sound 1 to 256
  set the volume of sound 2 to 140
  repeat with cnt = 40 to 46
    puppetSprite cnt, false
    set the visible of sprite cnt to false
  end repeat
end